Measles coverage in Ho Chi Minh

library(tidyverse)
library(plotly)
library(downloadthis)

Download data

List of variables
Variable Description
birth_year birth year of cohort
district residential address (24 districts of Ho Chi Minh city only)
any_shot number of patients who were vaccinated at least 1 time
shots_1 number of patients who were vaccinated exactly 1 time
shots_2 number of patients who were vaccinated exactly 2 times
shots_3 number of patients who were vaccinated exactly 3 times
birth_count number of newborns in birth_year (used as denominator for coverage)
coverage proportion of newborns that were vaccinated for measles (i.e. any_shot/birth_count)
age_group

Either "[0-1)" or "all"

  • if "[0-1)" then shot variables (any_shot, shots_1, etc.) only count vaccination shots within 1 year since birth

  • if "[0-1)" then shot variables count all vaccination shots recorded in registry

</details>

Plot coverage over the year

ggplotly(
  ggplot() + 
    geom_line(
      aes(x = birth_year, y = coverage, color = district), 
      data = measles_coverage %>% filter(age_group == "[0-1)")
    )
)
ggplotly(
  ggplot() + 
    geom_line(
      aes(x = birth_year, y = coverage, color = district), 
      data = measles_coverage %>% filter(age_group == "all")
    )
)

Geo plot